home *** CD-ROM | disk | FTP | other *** search
/ Interplay's Learn to Program Basic (Review Copy) / Learn to Program Basic Review Copy (Interplay)(June 23, 1998).ISO / pc / ltpbasic / refxmpl / fileexst.bas < prev    next >
BASIC Source File  |  1998-04-07  |  137b  |  10 lines
  1. If FileExist("Test") Then
  2.   Print "The file already exists"
  3. Else
  4.   FileOpen "Test"
  5.   FileWrite "This is a new file"
  6.   FileClose
  7. EndIf
  8.  
  9.